-- card: 4231 from stack: in
-- bmap block id: 4378
-- flags: 0000
-- background id: 2810
-- name: Play


-- part 1 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=158 top=292 right=314 bottom=350
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play in a rectangle
----- HyperTalk script -----
on mouseUp
  -- plays a specific animation file in a rectangle
  get the rectangle of btn "border" -- a transparent button
  put it into rectRefNum
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref, rectRefNum
  Studio1 close, ref
else
  put the result
end if
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=119 top=108 right=289 bottom=374
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Border


-- part 3 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=386 top=105 right=127 bottom=503
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play 3 times
----- HyperTalk script -----
on mouseUp
  -- plays a specific animation file in a rectangle
  get the rectangle of btn "border" -- a transparent button
  put it into rectRefNum
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref, rectRefNum, loop3 -- sets number of times it plays
  Studio1 close, ref
else
  put the result
end if
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=386 top=134 right=156 bottom=503
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play until click
----- HyperTalk script -----
on mouseUp
  get the rectangle of btn "border"
  put it into rectRefNum
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref, rectRefNum, cont -- continuous until mouseClick
  Studio1 close, ref
else
  put the result
end if
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=386 top=246 right=268 bottom=503
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play fast
----- HyperTalk script -----
on mouseUp
  get the rectangle of btn "border"
  put it into rectRefNum
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref, rectRefNum, cont, Speed60 -- sets speed 1 to 60
  Studio1 close, ref
else
  put the result
end if
end mouseUp



-- part 6 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=9 top=107 right=129 bottom=100
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play
----- HyperTalk script -----
on mouseUp
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref
else
  put the result
end if
Studio1 close, ref
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=386 top=270 right=292 bottom=503
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play slow
----- HyperTalk script -----
on mouseUp
  get the rectangle of btn "border"
  put it into rectRefNum
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref, rectRefNum, cont, Speed5 -- sets speed
  Studio1 close, ref
else
  put the result
end if
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=386 top=161 right=183 bottom=503
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play until key
----- HyperTalk script -----
on mouseUp
  get the rectangle of btn "border"
  put it into rectRefNum
  answer "Press any key to stop the animation."
  Studio1 open, "ref", "apple"
  if the result is empty
  then
  studio1 play, ref, rectRefNum, cont, key -- press any key to stop
  Studio1 close, ref
else
  put the result
end if
hide msg
end mouseUp



-- part contents for background part 8
----- text -----
Play

-- part contents for background part 9
----- text -----
Play the animation previously loaded into memory with the OPEN command.